with communautes_strings_test;
with communautes_strings;

with configuration;

procedure main is
   c : communautes_strings.communaute'class := configuration;
begin
   communautes_strings_test(c);
end main;
